home *** CD-ROM | disk | FTP | other *** search
/ Modeling the Dream / Modeling the Dream CD - Walkthroughs and Flybys II (1994)(Waite Group).iso / spacebar / boese.txt < prev    next >
Text File  |  1994-08-23  |  788b  |  41 lines
  1. video l
  2.  pload juke.gif p1 1
  3.  palette p1
  4.  cfade 12 0 30 p1 
  5.  pfree p1
  6.  opengl @c$"\bigdemo\bigdemo.ovr"
  7.  load sblaster.grp
  8.  closegl
  9.  sblaster overlay @t$"\mtd\sblaster.ovr"
  10.  set esc off
  11.  when esc goto unload
  12.  color 7
  13.  text 0 12 "Playing Niko Boese's sound bites, Esc to return"
  14.  text 0 0 "Press Enter to skip to next"
  15.  mark 16
  16.   if @loop<10
  17.    set num "0"$@loop
  18.   else
  19.    set num @loop
  20.   endif
  21.   sblaster use @c$"\\sbdemos\\boese\\dream_"$@num$".voc"
  22.   color 0
  23.   rect 0 190 319 199 
  24.   color 7
  25.   text 0 190 "Playing \SBDEMOS\BOESE\DREAM_"$@num$".VOC"
  26.   sblaster play
  27.   not_fin:
  28.    waitkey 0
  29.    getkey k name
  30.    if @k==return enuf
  31.    sblaster DONE
  32.   if !@0 not_fin
  33.   enuf:
  34.   sblaster stop
  35.  loop
  36.  unload:
  37.  when esc
  38.  sblaster quit
  39.  set esc on
  40. exitnow
  41.